Public Class EPersonal
#Region "herencia de persona"
    Inherits EPersona
#End Region
#Region "declaracion de propiedades"

    Private mLegajo As Int32
    Private mFecha_Nacimiento As Date
    Private mCuit As String
    Private mestado As Integer
    Private ListaDeCargos As List(Of Entidades.EPeriododeCargo)
    Private ListaDeLicencias As List(Of Entidades.ELicencia)
    Private ListaDeAsignaturas As List(Of Entidades.EAsignatura)

    Public Property Legajo() As Int32
        Get
            Return mLegajo
        End Get
        Set(ByVal value As Int32)
            mLegajo = value
        End Set
    End Property


    Public Property Fecha_Nacimiento() As Date
        Get
            Return mFecha_Nacimiento
        End Get
        Set(ByVal value As Date)
            mFecha_Nacimiento = value
        End Set
    End Property


    Public Property Cuit() As String
        Get
            Return mCuit
        End Get
        Set(ByVal value As String)
            mCuit = value
        End Set
    End Property

    Public Property estado() As Integer
        Get
            Return mestado
        End Get
        Set(ByVal value As Integer)
            mestado = value
        End Set
    End Property


    Public Property ListaCargos() As List(Of Entidades.EPeriododeCargo)
        Get
            Return ListaDeCargos
        End Get
        Set(ByVal value As List(Of Entidades.EPeriododeCargo))
            ListaDeCargos = value
        End Set
    End Property
#End Region

#Region "metodos publicos"

    'inicializa la entidad a los valeres por defecto
    Public Sub New()
        MyBase.new()
        mLegajo = 0
        mFecha_Nacimiento = "01/01/1900"
        mCuit = ""
        mestado = 0
    End Sub

#End Region
End Class
